home *** CD-ROM | disk | FTP | other *** search
/ Champak 54 / Vol 54.iso / games / totallys.swf / scripts / DefineSprite_20 / frame_2 / DoAction.as
Encoding:
Text File  |  2007-09-28  |  933 b   |  19 lines
  1. i = 1;
  2. while(1 >= Number(i))
  3. {
  4.    set("../drag" add i add ":vx",(eval("../drag" add i add ":vx") + (eval("../drag" add (i - 1) add ":x_value") + k - eval("../drag" add i add ":x_value")) * 1 / a) / b);
  5.    set("../drag" add i add ":vy",(eval("../drag" add i add ":vy") + (eval("../drag" add (i - 1) add ":y_value") - eval("../drag" add i add ":y_value")) * 1 / a) / b);
  6.    set("../drag" add i add ":x_value",eval("../drag" add i add ":x_value") + eval("../drag" add i add ":vx"));
  7.    set("../drag" add i add ":y_value",eval("../drag" add i add ":y_value") + eval("../drag" add i add ":vy"));
  8.    i = Number(i) + 1;
  9. }
  10. set("../drag0:x_value",getProperty("../drag0", _X));
  11. set("../drag0:y_value",getProperty("../drag0", _Y));
  12. i = 1;
  13. while(Number(i) >= 1)
  14. {
  15.    setProperty("../drag" add i, _X, eval("../drag" add i add ":x_value"));
  16.    setProperty("../drag" add i, _Y, eval("../drag" add i add ":y_value"));
  17.    i -= 1;
  18. }
  19.